inherited F_Fornecedores: TF_Fornecedores
  Left = 247
  Top = 186
  Height = 440
  Caption = 'Cadastro de Fornecedores'
  OldCreateOrder = True
  OnCreate = FormCreate
  OnShow = FormShow
  PixelsPerInch = 96
  TextHeight = 13
  inherited RxLabel1: TRxLabel
    Top = 8
    Width = 41
    Height = 14
    Font.Height = -11
    Font.Style = [fsBold]
  end
  object Label1: TLabel [1]
    Left = 80
    Top = 8
    Width = 32
    Height = 14
    Caption = 'Nome'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Rua: TLabel [2]
    Left = 283
    Top = 52
    Width = 20
    Height = 14
    Caption = 'Rua'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label12: TLabel [3]
    Left = 151
    Top = 52
    Width = 21
    Height = 14
    Caption = 'CEP'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label16: TLabel [4]
    Left = 15
    Top = 52
    Width = 99
    Height = 14
    Caption = 'Inscri'#231#227'o Estadual'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label9: TLabel [5]
    Left = 553
    Top = 8
    Width = 28
    Height = 14
    Caption = 'CNPJ'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label5: TLabel [6]
    Left = 630
    Top = 96
    Width = 14
    Height = 13
    Caption = 'UF'
  end
  object Label4: TLabel [7]
    Left = 391
    Top = 96
    Width = 38
    Height = 14
    Caption = 'Cidade'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label6: TLabel [8]
    Left = 16
    Top = 142
    Width = 49
    Height = 14
    Caption = 'Telefone'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label7: TLabel [9]
    Left = 152
    Top = 142
    Width = 18
    Height = 14
    Caption = 'Fax'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label10: TLabel [10]
    Left = 298
    Top = 142
    Width = 33
    Height = 14
    Caption = 'E-mail'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label3: TLabel [11]
    Left = 16
    Top = 96
    Width = 43
    Height = 14
    Caption = 'Contato'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object Label2: TLabel [12]
    Left = 16
    Top = 184
    Width = 73
    Height = 14
    Caption = 'Observa'#231#245'es'
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ParentFont = False
  end
  object E_Cidade: TEdit [13]
    Left = 392
    Top = 112
    Width = 217
    Height = 22
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    MaxLength = 60
    ParentFont = False
    TabOrder = 7
    Text = 'E_Cidade'
    OnKeyPress = E_CidadeKeyPress
  end
  object E_Obs: TMemo [14]
    Left = 16
    Top = 200
    Width = 657
    Height = 129
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    Lines.Strings = (
      'E_Obs')
    MaxLength = 4000
    ParentFont = False
    TabOrder = 12
  end
  inherited Panel1: TPanel
    Top = 340
    TabOrder = 13
    inherited B_gravar: TBitBtn
      Left = 128
      OnClick = B_gravarClick
    end
    inherited B_alterar: TBitBtn
      OnClick = B_alterarClick
    end
    inherited B_inserir: TBitBtn
      OnClick = B_inserirClick
    end
    inherited B_cancelar: TBitBtn
      Left = 188
      OnClick = B_cancelarClick
    end
    inherited B_excluir: TBitBtn
      Left = 248
      Enabled = False
      OnClick = B_excluirClick
    end
    inherited B_buscar: TBitBtn
      Left = 308
      OnClick = B_buscarClick
    end
    inherited B_primeiro: TBitBtn
      OnClick = B_primeiroClick
    end
    inherited B_voltar: TBitBtn
      Left = 449
      OnClick = B_voltarClick
    end
    inherited B_avancar: TBitBtn
      Left = 479
      OnClick = B_avancarClick
    end
    inherited B_ultimo: TBitBtn
      Left = 509
      OnClick = B_ultimoClick
    end
  end
  inherited E_Codigo: TRxCalcEdit
    Left = 16
    Top = 24
    TabOrder = 0
  end
  object E_Nome_Fornecedor: TEdit
    Left = 80
    Top = 23
    Width = 467
    Height = 22
    CharCase = ecUpperCase
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    MaxLength = 60
    ParentFont = False
    TabOrder = 1
    Text = 'E_NOME_FORNECEDOR'
    OnKeyDown = E_Nome_FornecedorKeyDown
  end
  object E_Cnpj: TEdit
    Left = 555
    Top = 23
    Width = 121
    Height = 22
    CharCase = ecUpperCase
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    MaxLength = 18
    ParentFont = False
    TabOrder = 2
    Text = 'E_CNPJ'
    OnKeyPress = E_CnpjKeyPress
  end
  object E_Rua: TEdit
    Left = 283
    Top = 68
    Width = 393
    Height = 22
    CharCase = ecUpperCase
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    MaxLength = 60
    ParentFont = False
    TabOrder = 5
    Text = 'E_RUA'
    OnKeyPress = E_RuaKeyPress
  end
  object E_Cep: TEdit
    Left = 151
    Top = 68
    Width = 119
    Height = 22
    CharCase = ecUpperCase
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    MaxLength = 18
    ParentFont = False
    TabOrder = 4
    Text = 'E_CEP'
    OnKeyPress = E_CepKeyPress
  end
  object E_Ie: TEdit
    Left = 15
    Top = 68
    Width = 121
    Height = 22
    CharCase = ecUpperCase
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    MaxLength = 16
    ParentFont = False
    TabOrder = 3
    Text = 'E_IE'
    OnKeyPress = E_IeKeyPress
  end
  object E_Uf: TComboBox
    Left = 627
    Top = 112
    Width = 49
    Height = 22
    CharCase = ecUpperCase
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    ItemHeight = 14
    MaxLength = 2
    ParentFont = False
    TabOrder = 8
    Text = 'E_UF'
    OnKeyPress = E_UfKeyPress
    Items.Strings = (
      'SP'
      'MT'
      'MS')
  end
  object E_Telefone: TEdit
    Left = 16
    Top = 157
    Width = 121
    Height = 22
    CharCase = ecUpperCase
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    MaxLength = 18
    ParentFont = False
    TabOrder = 9
    Text = 'E_TELEFONE'
    OnKeyPress = E_TelefoneKeyPress
  end
  object E_Fax: TEdit
    Left = 150
    Top = 157
    Width = 121
    Height = 22
    CharCase = ecUpperCase
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    MaxLength = 18
    ParentFont = False
    TabOrder = 10
    Text = 'E_FAX'
    OnKeyPress = E_FaxKeyPress
  end
  object E_Email: TEdit
    Left = 297
    Top = 157
    Width = 379
    Height = 22
    CharCase = ecLowerCase
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    MaxLength = 150
    ParentFont = False
    TabOrder = 11
    Text = 'e_email'
    OnKeyPress = E_EmailKeyPress
  end
  object E_Contato: TEdit
    Left = 16
    Top = 112
    Width = 361
    Height = 22
    CharCase = ecUpperCase
    Font.Charset = ANSI_CHARSET
    Font.Color = clWindowText
    Font.Height = -11
    Font.Name = 'Arial'
    Font.Style = [fsBold]
    MaxLength = 60
    ParentFont = False
    TabOrder = 6
    Text = 'E_CONTATO'
    OnKeyPress = E_ContatoKeyPress
  end
  object Panel2: TPanel
    Left = 6
    Top = 47
    Width = 673
    Height = 287
    ParentBackground = False
    ParentColor = True
    TabOrder = 14
    Visible = False
    object Grid_Fornecedor: TwwDBGrid
      Left = 5
      Top = 5
      Width = 663
      Height = 276
      DisableThemes = False
      Selected.Strings = (
        'NOME_FORNECEDOR'#9'79'#9'Nome'
        'TELEFONE'#9'24'#9'Telefone')
      IniAttributes.Delimiter = ';;'
      TitleColor = clBtnFace
      FixedCols = 0
      ShowHorzScrollBar = True
      DataSource = Dm_Querys.Dsq_Fornecedor
      TabOrder = 0
      TitleAlignment = taLeftJustify
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      TitleLines = 1
      TitleButtons = False
      Visible = False
      OnDblClick = Grid_FornecedorDblClick
      OnKeyDown = Grid_FornecedorKeyDown
    end
  end
end
